﻿Imports TorneosBackEnd

Public Class ListarParticipantes

    Private Sub btnListar_Click(sender As System.Object, e As System.EventArgs) Handles btnListar.Click

        Dim part As New ParticipanteNegocio


        Dim participantes = part.listar()
        Me.dgvListar.DataSource = participantes
        Me.dgvListar.EditMode = False

        Me.dgvListar.Columns(0).HeaderText = "idParticipante"
        Me.dgvListar.Columns(1).HeaderText = "Nombre"
        Me.dgvListar.Columns(2).HeaderText = "Apellido"
        Me.dgvListar.Columns(3).HeaderText = "Fech_nac"
        Me.dgvListar.Columns(4).HeaderText = "Sexo"
        Me.dgvListar.Columns(5).HeaderText = "Correo"
        Me.dgvListar.Columns(6).HeaderText = "Direccion"

    End Sub
End Class